home *** CD-ROM | disk | FTP | other *** search
/ Delphi Informant Complete 1995 - 2000 / Delphi Informant Complete 1995 to 2000.iso / Delphi Informant Magazine Complete Works SOURCE CODE 1995.rar / 1995 / JUN / PTRPDEMO / TEST7.TRP < prev    next >
Text File  |  1995-01-17  |  166b  |  9 lines
  1. procedure main
  2.         local 
  3.                 v : integer;
  4.         endVar
  5.         for v := 15 to 1 step -2 
  6.                 writeln(v)
  7.         endFor
  8. endproc
  9.